home *** CD-ROM | disk | FTP | other *** search
/ Micro Dingo 39 / Micro_Dingo_39_CD1.mdx / Delires / Hentai / sim.swf / scripts / DefineButton2_296 / BUTTONCONDACTION on(release, keyPress d).as
Text File  |  2002-05-21  |  465b  |  28 lines
  1. on(release, keyPress "d"){
  2.    if(hp >= 20 and money >= 20)
  3.    {
  4.       if(ch < 200)
  5.       {
  6.          money -= 20;
  7.          hp -= 20;
  8.          if(style == 2)
  9.          {
  10.             ch = ch + 5 + random(4);
  11.          }
  12.          else
  13.          {
  14.             ch = ch + 3 + random(3);
  15.          }
  16.          if(200 < ch)
  17.          {
  18.             ch = 200;
  19.          }
  20.          gotoAndPlay(221);
  21.       }
  22.    }
  23.    else
  24.    {
  25.       gotoAndStop(250);
  26.    }
  27. }
  28.